Namespace DataTypes
    Public Class EventScheduleItem
        Private _ItemId, _ItemTitle, _ItemDescription, _ScheduleId As String
        Private _ItemStartDateTime, _ItemEndDateTime As DateTime

        Public Sub New(ByVal Title As String, ByVal Description As String, ByVal StartDateTime As DateTime, ByVal EndDateTime As DateTime)
            _ItemTitle = Title
            _ItemDescription = Description
            _ItemStartDateTime = StartDateTime
            _ItemEndDateTime = EndDateTime
        End Sub

        Public Sub New(ByVal ScheduleId As String, ByVal Title As String, ByVal Description As String, ByVal StartDateTime As DateTime, ByVal EndDateTime As DateTime)
            _ScheduleId = ScheduleId
            _ItemTitle = Title
            _ItemDescription = Description
            _ItemStartDateTime = StartDateTime
            _ItemEndDateTime = EndDateTime
        End Sub

        Public Property ScheduleId() As String
            Get
                Return _ScheduleId
            End Get
            Set(ByVal value As String)
                _ScheduleId = value
            End Set
        End Property

        Public Property ItemId() As String
            Get
                Return _ItemId
            End Get
            Set(ByVal value As String)
                _ItemId = value
            End Set
        End Property
        Public Property ItemTitle() As String
            Get
                Return _ItemTitle
            End Get
            Set(ByVal value As String)
                _ItemTitle = value
            End Set
        End Property

        Public Property ItemDescription() As String
            Get
                Return _ItemDescription
            End Get
            Set(ByVal value As String)
                _ItemDescription = value
            End Set
        End Property

        Public Property ItemStartDateTime() As DateTime
            Get
                Return _ItemStartDateTime
            End Get
            Set(ByVal value As DateTime)
                _ItemStartDateTime = value
            End Set
        End Property

        Public Property ItemEndDateTime() As DateTime
            Get
                Return _ItemEndDateTime
            End Get
            Set(ByVal value As DateTime)
                _ItemEndDateTime = value
            End Set
        End Property
    End Class
End Namespace